foreach
-komento on tarkoitettu listan alkioiden läpikäymiseen. Komento käy silmukassa listan jokaisen alkion läpi järjestyksessä alusta loppuun ja sille annetaan parametre ina muuttujan nimi, lista ja komentojen joukko. Muuttujassa on joka kierroksella listan vuorossa olevan alkion arvo ja komentojen joukko suoritetaan joka kierroksella. Kierroksia suoritetaan yhtä paljon kuin listassa on alkioita. Esimerkissä&nbs p;set a {eka toka kolkki}
set b ""
foreach i $a {
set b [linsert $b 0 $i]
}
set b
=> kolkki toka eka
set i
=> kolkki
käydään lista a läpi ja laitetaan sen arvot päinvastaisessa järjestyksessä listaan b. Muuttujassa i on siis en simmäisellä kierroksella arvo eka, toisella toka ja kolmannella kierroksella kolkki. foreach-komennon suoritukseen ei liity ehtoja ja sen suoritus jatkuu niin kauan, kunnes listan kaikki alkiot on käyty läpi.
